<?php
   	include ('../inc/config.php');

	if (!isset($_SESSION["admin"])) { die('Hacking attempt!!'); }

	$nombre_temporal = time().'_usuarios.xls';
	$destino = ROOT.'/temp/'.$nombre_temporal;
			
	$cond = "select * from usuarios  order by apellido ASC";
	$rs   = $db->Execute($cond);
	$Base = $rs->GetRows();

	$fp = fopen("$destino", 'w');
	$renglon = "<table><tr style='background:#683D85;color:#FFF;'>";
	$renglon.= "<td style='height:24px;'>Apellido</td>";  
	$renglon.= "<td>Nombre</td>"; 
	$renglon.= "<td>Telefono</td>";
	$renglon.= "<td>Email</td>";    
	$renglon.= "<td>Ciudad</td>";
	$renglon.= "<td>Provincia</td>";
	$renglon.= "<td>Pais</td>";
	$renglon.= "<td>Registro</td></tr>";
				
	fwrite($fp, $renglon);

	foreach($Base as $b) {
				$color = iif($color=='FEFFCC','FFF','FEFFCC');
				$renglon = "<tr style='background:#$color;color:#000;'>";
				$renglon.= "<td>{$b['apellido']}</td>";  
				$renglon.= "<td>{$b['nombre']}</td>"; 
				$renglon.= "<td>{$b['telefono']}</td>";
				$renglon.= "<td>{$b['email']}</td>";    
				$renglon.= "<td>{$b['ciudad']}</td>";
				$renglon.= "<td>{$b['provincia']}</td>";
				$renglon.= "<td>{$b['pais']}</td>";
				$renglon.= "<td>".date("d/m/Y",$b['fecha_registro'])."</td>";				
				$renglon.= "</tr>";
				fwrite($fp, $renglon);
	}

	fclose($fp);
	$file = URL.'/temp/'.$nombre_temporal;
	$fecha = date("d-m-Y");
	$nombre = 'RA_usuarios_al_'.$fecha.'.xls';
	header("Content-disposition: attachment; filename=$nombre");
	header("Content-type: application/octet-stream");
	readfile($file);
	unlink($destino);
	
	redirect(URL.'/admin/usuarios.php');
	die();
?>			
